﻿Public Class DichVuDuocDat
    Dim _id, _tiecCuoi, _dichVu As Integer

    Public Property ID() As Integer
        Get
            Return _id
        End Get
        Set(ByVal value As Integer)
            _id = value
        End Set
    End Property

    Public Property Tiệc_Cưới() As Integer
        Get
            Return _tiecCuoi
        End Get
        Set(ByVal value As Integer)
            _tiecCuoi = value
        End Set
    End Property
    Public Property Dịch_Vụ() As Integer
        Get
            Return _dichVu
        End Get
        Set(ByVal value As Integer)
            _dichVu = value
        End Set
    End Property

    Public Sub New(ByVal id As Integer, ByVal tiecCuoi As Integer, ByVal dichVu As Integer)
        _id = id
        _tiecCuoi = tiecCuoi
        _dichVu = dichVu
    End Sub
End Class
